home *** CD-ROM | disk | FTP | other *** search
/ Aminet 25 / Aminet 25 (1998)(GTI - Schatztruhe)[!][Jun 1998].iso / Aminet / util / pack / xpk_Source.lha / xpk_Source / test / testXpkPwd.c < prev   
C/C++ Source or Header  |  1998-02-08  |  2KB  |  86 lines
  1. #define NAME        "testXpkPwd"
  2. #define DISTRIBUTION    "(Freeware) "
  3. #define REVISION    "3"
  4.  
  5. /* Programmheader
  6.  
  7.     Name:        testXpkPwd
  8.     Author:        SDI
  9.     Distribution:    Freeware
  10.     Description:    test XpkPassRequest
  11.     Compileropts:    -
  12.     Linkeropts:    -l xpkmaster
  13.  
  14.  1.0   29.12.96 : first Version
  15.  1.1   28.03.97 : some new data output
  16.  1.2   18.01.98 : added position tests
  17.  1.3   21.01.98 : added verification test
  18. */
  19.  
  20. #include <proto/exec.h>
  21. #include <proto/dos.h>
  22. #include <proto/xpkmaster.h>
  23. #include "SDI_defines.h"
  24.  
  25. struct Library *XpkBase = 0;
  26.  
  27. void main(void)
  28. {
  29.   ULONG err;
  30.   UBYTE buf[200];
  31.   UWORD key16;
  32.   ULONG key32;
  33.  
  34.   if(!(XpkBase = OpenLibrary(XPKNAME, 4)))
  35.     return;
  36.  
  37.   if(!(err = XpkPassRequestTags(XPK_TimeOut, 20, XPK_PasswordBuf, buf, XPK_PassBufSize, 200, TAG_DONE)))
  38.   {
  39.     STRPTR a = buf;  
  40.     VPrintf("Password = %s\n", &a);
  41.   }
  42.   else
  43.     XpkPrintFault(err, "No Password");
  44.  
  45.   if(!(err = XpkPassRequestTags(XPK_TimeOut, 40, XPK_Key16BitPtr, &key16, TAG_DONE)))
  46.     VPrintf("16 bit key = %X\n", &key16);
  47.   else
  48.     XpkPrintFault(err, "No 16 bit key");
  49.  
  50.   if(!XpkPassRequestTags(XPK_Key32BitPtr, &key32, TAG_DONE))
  51.     VPrintf("32 bit key = %lX\n", &key32);
  52.   else
  53.     XpkPrintFault(err, "No 32 bit key");
  54.  
  55.   XpkPassRequestTags(XPK_Key32BitPtr, &key32, XPK_PassVerify, TAG_DONE);
  56.  
  57.   XpkPassRequestTags(XPK_Key32BitPtr, &key32, XPK_TimeOut, 5,
  58.   XPK_PassTitle, "Left 0, Top 11",
  59.   XPK_PassWinLeft, 0, XPK_PassWinTop, 11, TAG_DONE);
  60.  
  61.   XpkPassRequestTags(XPK_Key32BitPtr, &key32, XPK_TimeOut, 5,
  62.   XPK_PassTitle, "Width 100, Height 30",
  63.   XPK_PassWinWidth, 100, XPK_PassWinHeight, 30, TAG_DONE);
  64.  
  65.   XpkPassRequestTags(XPK_Key32BitPtr, &key32, XPK_TimeOut, 5,
  66.   XPK_PassTitle, "Left 320, Top 128, Center",
  67.   XPK_PassWinLeft, 320, XPK_PassWinTop, 128, XPK_PassCenter, 1, TAG_DONE);
  68.  
  69.   /* autoadjust tests */
  70.   XpkPassRequestTags(XPK_Key32BitPtr, &key32, XPK_TimeOut, 5,
  71.   XPK_PassTitle, "Left 0, Top 0, Center",
  72.   XPK_PassWinLeft, 0, XPK_PassWinTop, 0, XPK_PassCenter, 1, TAG_DONE);
  73.  
  74.   XpkPassRequestTags(XPK_Key32BitPtr, &key32, XPK_TimeOut, 5,
  75.   XPK_PassTitle, "Width 8000, Height 3000",
  76.   XPK_PassWinWidth, 8000, XPK_PassWinHeight, 3000, TAG_DONE);
  77.  
  78.   /* internal defaults */
  79.   XpkPassRequestTags(XPK_Key32BitPtr, &key32, XPK_TimeOut, 5,
  80.   XPK_PassTitle, "Width 5, Height 5",
  81.   XPK_PassWinWidth, 5, XPK_PassWinHeight, 5, TAG_DONE);
  82.  
  83.   CloseLibrary(XpkBase);
  84. }
  85.  
  86.